home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1994 / MacHack 1994.toast / MacHack™ 1987-1994 / MacHack™ '90 / Other Stuff / Networking ƒ / ATP Sample App / code fragments / sending < prev   
Encoding:
Text File  |  1990-06-12  |  745 b   |  32 lines  |  [TEXT/MPS ]
  1.     pb->ioRefNum = ATP_REFNUM;
  2.     pb->csCode = sendRequest;
  3.     pb->addrBlk.network = addr->na_network;
  4.     pb->addrBlk.node = addr->na_node;
  5.     pb->addrBlk.socket = addr->na_socket;
  6.     
  7.     pb->atpSkt = atpSocket;
  8.     pb->atpFlgs = 0;
  9.     pb->userData = user;
  10.  
  11.     pb->sendReqUnion.reqLength = size;
  12.     pb->sendReqUnion.reqPointer = pData;
  13.  
  14.     pb->sendReqUnion.bdsPointer = bds;
  15.     pb->sendReqUnion.numOfBuffs = theBDSCount;
  16.     pb->sendReqUnion.timeOutVal = ATP_TIMEOUT;
  17.     pb->sendReqUnion.retryCount = ATP_RETRY;
  18.  
  19.     for (i = 0; i < theBDSCount; i++, b++)
  20.         {    
  21.         b->bsdBuffSz = MAX_RESP_SIZE;
  22.         b->bdsBuffAddr = responseBuff;
  23.         b->bdsDataSz = 0;
  24.         }
  25.         
  26.     result = PBControl(&iopb, FALSE);
  27.     
  28.     for (i = 0, b = bds; i < theBDSCount; i++, b++)
  29.         {    
  30.         *responseSize += b->bdsDataSz;
  31.         }
  32.